module global_data
  use prec
  IMPLICIT NONE
  SAVE

  ! controls
  integer(i12) :: nsamples = 100       ! # of GK samples
!  real(r8) :: lambda = 100.
!  real(r8) :: m = 1.		!mass ratio
!  real(r8) :: omega1 = 1.	!transform frequency for mode_X
!  real(r8) :: omega2 = 1.	!transform frequency for mode_Y
  integer :: nmcsteps = 100       ! # of mcsteps in each sample
  integer :: nmcequil = 100       ! # of mcsteps to equilibrate (before averaging)
  real(r8) :: tottime = 1.0        ! how long to run each MD
  real(r8) :: dt = 1.e-3           ! md time step
  real(r8) :: snaptime = 1.e-1    ! time between snapshots (J-grid)
  real(r8) :: du = -1            ! magnitude of attempted displacements (<0, guess)
  real(r8) :: dv = -1            ! magnitude of attempted changes in momentum (<0, guess)
  integer :: seed = -123456789    ! ran # seed

  integer :: nmdstepsbetweensnaps
  integer :: nsnaps


  end module global_data 
